From news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!howland.reston.ans.net!swrinde!gatech!newsjunkie.ans.net!newsfeeds.ans.net!news-m01.ny.us.ibm.net!ausnews.austin.ibm.com!geraldo.cc.utexas.edu!usenet Mon Feb 19 11:08:48 1996
Article: 3890 of rec.games.corewar
Path: news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!howland.reston.ans.net!swrinde!gatech!newsjunkie.ans.net!newsfeeds.ans.net!news-m01.ny.us.ibm.net!ausnews.austin.ibm.com!geraldo.cc.utexas.edu!usenet
From: John K W <jwilkinson@mail.utexas.edu>
Newsgroups: rec.games.corewar
Subject: Re: Spirals and Harmony
Date: 16 Feb 1996 19:19:15 GMT
Organization: The University of Texas at Austin, Austin, Texas
Lines: 53
Message-ID: <4g2lbj$qja@geraldo.cc.utexas.edu>
References: <1996Feb14.105954@acad.drake.edu> <1996Feb15.143835@acad.drake.edu> <4g29lk$67a@news-rocq.inria.fr>
NNTP-Posting-Host: slip-22-10.ots.utexas.edu
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Mailer: Mozilla 1.22 (Windows; I; 16bit)

Well, since people have been talking about SETI again, I figured I'd
rumage around on my HD and post what I'm fairly certain is the version
which crashed from #1 to being pushed off the Hill in only 38(?)
challenges.

Oh and the reason I call it a "Double scanner" is because it attacks
the A- and B-field ptrs simultaneously.  I believe Anders Ivner told
me he hadn't ever seen this before... and neither had I.  I dunno
if it's "new" or not...

	mov	glue,	}pt
	mov	glue,	>pt

;redcode-94
;name SETI
;author JKW
;assert (CORESIZE == 8000)
;strategy Double scanner

STEP	equ	3044
DIST	equ	10
A	equ	(pt)
ISTEP	equ	(8001/21)
LEN	equ	3

	org	start

start	sub	c,	pt
pt	cmp.f	A,	A+DIST
	slt.ab	#40,	pt
cnt	djn	-3,	#0
len	mov	#LEN,	#1000
	mov	pt,	pt-3
	mov	glue,	}pt
	mov	glue,	>pt
	djn	-2,	len
	mov	pt-3,	pt
	jmn.b	cnt,	cnt
	add.a   #ISTEP+1,cpt
	mov	@-1,	{cpt
	jmp     -2
 	dat	-10,	-10
c 	dat	-STEP,	-STEP
glue	spl	#0,	#0
cpt	spl	#2,	#3

-- 
 /     John K. Wilkinson     -    jwilkinson@mail.utexas.edu     \
| "I don't have the power because I've got the monkeys.  I've got |
 \  the power because I'll set the monkeys LOOSE."  -Dave Foley  /
             -=- http://ccwf.cc.utexas.edu/~ifio452/ -=-